home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 May: Tool Chest / Developer CD Series May 1996 (Tool Chest) (Apple Computer) (1996).iso / Tool Chest / Development Tools & Languages / Macintosh Common Lisp Related / User Contributions / zebu v3.3.3 (LALR parser) / Make-Zebu-Parser < prev    next >
Encoding:
Text File  |  1994-09-12  |  1.3 KB  |  49 lines  |  [TEXT/ttxt]
  1. #! /bin/sh
  2. # -*- mode:     CL          -*- -------------------------------------------- #
  3. # File:         Make-Zebu-Parser
  4. # Description:  
  5. # Author:       Joachim H. Laubsch
  6. # Created:      20-Jan-93
  7. # Modified:     Tue Apr 19 13:01:11 1994 (Joachim H. Laubsch)
  8. # Language:     
  9. # Package:      USER
  10. # Status:       Experimental (Do Not Distribute) 
  11. # RCS $Header: $
  12. #
  13. # (c) Copyright 1993, Hewlett-Packard Company
  14. ##############################################################################
  15. # Revisions:
  16. # RCS $Log: $
  17. ##############################################################################
  18.  
  19. echo "Make the Zebu Parser"
  20.  
  21. export ZEBU
  22. set +u
  23.  
  24. $LISP/lucid-ae -n $* << EOF 2>&1 | tee /tmp/Make-Zebu-Parser.log
  25.  
  26. (in-package "CL-USER")
  27.  
  28. (if (environment-variable "ZEBU")
  29.     (setf (working-directory) (environment-variable "ZEBU"))
  30.   (error "Unix Environment Variable: ZEBU is unbound"))
  31.  
  32. (load "ZEBU-init.lisp")
  33.  
  34. (zb::zebu)
  35.  
  36. (discard-source-file-info)
  37.  
  38. (DISKSAVE "./Zebu-Parser"
  39.       :FULL-GC T
  40.       :WRITABLE T
  41.       :VERBOSE T
  42.       :restart-function #'zb::load-from-command-line)
  43. (quit)
  44. EOF
  45.  
  46. ##############################################################################
  47. ##                          End of Make-Zebu-Parser
  48. ##############################################################################
  49.